home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Info-Mac 3
/
Info_Mac_1994-01.iso
/
Development
/
General
/
Gestalt Value Library
/
GestaltValue.p
< prev
Wrap
Text File
|
1992-04-28
|
783b
|
40 lines
{
Created: Tuesday April 29, 1992
GestaltValue.p
Copyright Apple Computer, Inc. 1992
All rights reserved
}
{$IFC UNDEFINED UsingIncludes}
{$SETC UsingIncludes := 0}
{$ENDC}
{$IFC NOT UsingIncludes}
UNIT GestaltValue;
INTERFACE
{$ENDC}
{$IFC UNDEFINED UsingGestaltValue}
{$SETC UsingGestaltValue := 1}
{$I+}
{$SETC GestaltValueIncludes := UsingIncludes}
{$SETC UsingIncludes := 1}
{$IFC UNDEFINED UsingTypes}
{$I $$Shell(PInterfaces)Types.p}
{$ENDC}
{$SETC UsingIncludes := GestaltValueIncludes}
FUNCTION NewGestaltValue(selector: OSType;newValue: LONGINT): OSErr;
FUNCTION ReplaceGestaltValue(selector: OSType;replacementValue: LONGINT): OSErr;
FUNCTION DeleteGestaltValue(selector: OSType): OSErr;
{$ENDC} { UsingGestaltEqu }
{$IFC NOT UsingIncludes}
END.
{$ENDC}